home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / getkey1r / decbin.frm (.txt) next >
Visual Basic Form  |  1999-07-29  |  17KB  |  567 lines

  1. VERSION 5.00
  2. Begin VB.Form frmDecBin 
  3.    Caption         =   "Number Base Convertor - Decimal to Binary"
  4.    ClientHeight    =   3420
  5.    ClientLeft      =   60
  6.    ClientTop       =   630
  7.    ClientWidth     =   6855
  8.    LinkTopic       =   "Form1"
  9.    Picture         =   "DecBin.frx":0000
  10.    ScaleHeight     =   3420
  11.    ScaleWidth      =   6855
  12.    StartUpPosition =   2  'CenterScreen
  13.    Begin VB.TextBox txthex2 
  14.       Height          =   285
  15.       Left            =   2040
  16.       TabIndex        =   15
  17.       Top             =   3120
  18.       Visible         =   0   'False
  19.       Width           =   375
  20.    End
  21.    Begin VB.TextBox txthex1 
  22.       Height          =   285
  23.       Left            =   1320
  24.       TabIndex        =   14
  25.       Top             =   3120
  26.       Visible         =   0   'False
  27.       Width           =   375
  28.    End
  29.    Begin VB.TextBox txtnum 
  30.       Height          =   285
  31.       Left            =   240
  32.       TabIndex        =   13
  33.       Top             =   3000
  34.       Visible         =   0   'False
  35.       Width           =   735
  36.    End
  37.    Begin VB.CommandButton Command2 
  38.       Caption         =   "Convert"
  39.       BeginProperty Font 
  40.          Name            =   "Times New Roman"
  41.          Size            =   9.75
  42.          Charset         =   0
  43.          Weight          =   700
  44.          Underline       =   0   'False
  45.          Italic          =   0   'False
  46.          Strikethrough   =   0   'False
  47.       EndProperty
  48.       Height          =   375
  49.       Left            =   3720
  50.       TabIndex        =   3
  51.       Top             =   2640
  52.       Width           =   1215
  53.    End
  54.    Begin VB.TextBox txtDec 
  55.       BeginProperty Font 
  56.          Name            =   "Tahoma"
  57.          Size            =   9.75
  58.          Charset         =   0
  59.          Weight          =   400
  60.          Underline       =   0   'False
  61.          Italic          =   0   'False
  62.          Strikethrough   =   0   'False
  63.       EndProperty
  64.       Height          =   405
  65.       Left            =   2640
  66.       TabIndex        =   1
  67.       Top             =   2640
  68.       Width           =   495
  69.    End
  70.    Begin VB.CommandButton Command1 
  71.       Caption         =   "Exit"
  72.       BeginProperty Font 
  73.          Name            =   "Times New Roman"
  74.          Size            =   9.75
  75.          Charset         =   0
  76.          Weight          =   700
  77.          Underline       =   0   'False
  78.          Italic          =   0   'False
  79.          Strikethrough   =   0   'False
  80.       EndProperty
  81.       Height          =   375
  82.       Left            =   5400
  83.       TabIndex        =   0
  84.       Top             =   2640
  85.       Width           =   855
  86.    End
  87.    Begin VB.Label lblhex 
  88.       BackStyle       =   0  'Transparent
  89.       BeginProperty Font 
  90.          Name            =   "Tahoma"
  91.          Size            =   9.75
  92.          Charset         =   0
  93.          Weight          =   700
  94.          Underline       =   0   'False
  95.          Italic          =   0   'False
  96.          Strikethrough   =   0   'False
  97.       EndProperty
  98.       ForeColor       =   &H000000FF&
  99.       Height          =   255
  100.       Left            =   360
  101.       TabIndex        =   16
  102.       Top             =   2160
  103.       Width           =   6255
  104.    End
  105.    Begin VB.Label lblout 
  106.       BackStyle       =   0  'Transparent
  107.       BeginProperty Font 
  108.          Name            =   "Tahoma"
  109.          Size            =   9.75
  110.          Charset         =   0
  111.          Weight          =   700
  112.          Underline       =   0   'False
  113.          Italic          =   0   'False
  114.          Strikethrough   =   0   'False
  115.       EndProperty
  116.       ForeColor       =   &H000000FF&
  117.       Height          =   255
  118.       Left            =   360
  119.       TabIndex        =   12
  120.       Top             =   1800
  121.       Width           =   6255
  122.    End
  123.    Begin VB.Image bitty 
  124.       Height          =   480
  125.       Index           =   7
  126.       Left            =   240
  127.       Picture         =   "DecBin.frx":4B146
  128.       Top             =   960
  129.       Width           =   480
  130.    End
  131.    Begin VB.Image bitty 
  132.       Height          =   480
  133.       Index           =   6
  134.       Left            =   1080
  135.       Picture         =   "DecBin.frx":4B588
  136.       Top             =   960
  137.       Width           =   480
  138.    End
  139.    Begin VB.Image bitty 
  140.       Height          =   480
  141.       Index           =   5
  142.       Left            =   1920
  143.       Picture         =   "DecBin.frx":4B9CA
  144.       Top             =   960
  145.       Width           =   480
  146.    End
  147.    Begin VB.Image bitty 
  148.       Height          =   480
  149.       Index           =   4
  150.       Left            =   2760
  151.       Picture         =   "DecBin.frx":4BE0C
  152.       Top             =   960
  153.       Width           =   480
  154.    End
  155.    Begin VB.Image bitty 
  156.       Height          =   480
  157.       Index           =   3
  158.       Left            =   3600
  159.       Picture         =   "DecBin.frx":4C24E
  160.       Top             =   960
  161.       Width           =   480
  162.    End
  163.    Begin VB.Image bitty 
  164.       Height          =   480
  165.       Index           =   2
  166.       Left            =   4440
  167.       Picture         =   "DecBin.frx":4C690
  168.       Top             =   960
  169.       Width           =   480
  170.    End
  171.    Begin VB.Image bitty 
  172.       Height          =   480
  173.       Index           =   1
  174.       Left            =   5280
  175.       Picture         =   "DecBin.frx":4CAD2
  176.       Top             =   960
  177.       Width           =   480
  178.    End
  179.    Begin VB.Image bitty 
  180.       Height          =   480
  181.       Index           =   0
  182.       Left            =   6120
  183.       Picture         =   "DecBin.frx":4CF14
  184.       Top             =   960
  185.       Width           =   480
  186.    End
  187.    Begin VB.Label Label2 
  188.       BackStyle       =   0  'Transparent
  189.       Caption         =   "1"
  190.       BeginProperty Font 
  191.          Name            =   "Tahoma"
  192.          Size            =   9.75
  193.          Charset         =   0
  194.          Weight          =   700
  195.          Underline       =   0   'False
  196.          Italic          =   0   'False
  197.          Strikethrough   =   0   'False
  198.       EndProperty
  199.       ForeColor       =   &H000000FF&
  200.       Height          =   255
  201.       Index           =   7
  202.       Left            =   6240
  203.       TabIndex        =   11
  204.       Top             =   600
  205.       Width           =   375
  206.    End
  207.    Begin VB.Label Label2 
  208.       BackStyle       =   0  'Transparent
  209.       Caption         =   "2"
  210.       BeginProperty Font 
  211.          Name            =   "Tahoma"
  212.          Size            =   9.75
  213.          Charset         =   0
  214.          Weight          =   700
  215.          Underline       =   0   'False
  216.          Italic          =   0   'False
  217.          Strikethrough   =   0   'False
  218.       EndProperty
  219.       ForeColor       =   &H000000FF&
  220.       Height          =   255
  221.       Index           =   6
  222.       Left            =   5400
  223.       TabIndex        =   10
  224.       Top             =   600
  225.       Width           =   375
  226.    End
  227.    Begin VB.Label Label2 
  228.       BackStyle       =   0  'Transparent
  229.       Caption         =   "4"
  230.       BeginProperty Font 
  231.          Name            =   "Tahoma"
  232.          Size            =   9.75
  233.          Charset         =   0
  234.          Weight          =   700
  235.          Underline       =   0   'False
  236.          Italic          =   0   'False
  237.          Strikethrough   =   0   'False
  238.       EndProperty
  239.       ForeColor       =   &H000000FF&
  240.       Height          =   255
  241.       Index           =   5
  242.       Left            =   4560
  243.       TabIndex        =   9
  244.       Top             =   600
  245.       Width           =   375
  246.    End
  247.    Begin VB.Label Label2 
  248.       BackStyle       =   0  'Transparent
  249.       Caption         =   "8"
  250.       BeginProperty Font 
  251.          Name            =   "Tahoma"
  252.          Size            =   9.75
  253.          Charset         =   0
  254.          Weight          =   700
  255.          Underline       =   0   'False
  256.          Italic          =   0   'False
  257.          Strikethrough   =   0   'False
  258.       EndProperty
  259.       ForeColor       =   &H000000FF&
  260.       Height          =   255
  261.       Index           =   4
  262.       Left            =   3720
  263.       TabIndex        =   8
  264.       Top             =   600
  265.       Width           =   375
  266.    End
  267.    Begin VB.Label Label2 
  268.       BackStyle       =   0  'Transparent
  269.       Caption         =   "16"
  270.       BeginProperty Font 
  271.          Name            =   "Tahoma"
  272.